function [discount,beca,stipend] = u36_2011(math,lang,demrecode)
%% Universidad Catolica de la Santisima Concepcion
lm=(math+lang)/2;
discount=zeros(size(lm,1),1);
beca=zeros(size(lm,1),1);
stipend=zeros(size(lm,1),1);

%BVP
if demrecode==3653 || demrecode==3657 || demrecode==3610 || demrecode==3656 || demrecode==3609 || demrecode==3615 || demrecode==3652 || demrecode==3665
    [discount,stipend]=bvp(lm);
end

end
